object mainwin: Tmainwin
  Left = 90
  Top = 137
  Width = 435
  Height = 300
  Caption = 'Print With Screen Preview'
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu1
  PixelsPerInch = 96
  WindowMenu = ActiveWindows1
  OnClose = FormClose
  OnCreate = FormCreate
  TextHeight = 16
  object MainMenu1: TMainMenu
    Left = 360
    Top = 20
    object File1: TMenuItem
      Caption = '&File'
      object ReportPreviewActive1: TMenuItem
        Caption = 'Report Preview Active'
        OnClick = ReportPreviewActive1Click
      end
      object SelectPrinter1: TMenuItem
        Caption = '&Select Printer'
        OnClick = SelectPrinter1Click
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object ActiveWindows1: TMenuItem
      Caption = '&Active Windows'
      object Normal1: TMenuItem
        Caption = '&Normal'
        OnClick = Normal1Click
      end
      object Cascade1: TMenuItem
        Caption = '&Cascade'
        OnClick = Cascade1Click
      end
      object Tile1: TMenuItem
        Caption = '&Tile'
        OnClick = Tile1Click
      end
    end
    object Samples1: TMenuItem
      Caption = '&Print/Preview Samples'
      object PlainText1: TMenuItem
        Caption = 'Preview Routing Card'
        OnClick = PlainText1Click
      end
      object PreviewJobCost1: TMenuItem
        Caption = 'Preview Job Cost'
        OnClick = PreviewJobCost1Click
      end
      object PreviewJobDueShip1: TMenuItem
        Caption = 'Preview Job Due/Ship'
        OnClick = PreviewJobDueShip1Click
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object ViewPictureofPart1: TMenuItem
        Caption = 'View Picture of Part'
        OnClick = ViewPictureofPart1Click
      end
      object ViewBluePrint1: TMenuItem
        Caption = 'View Blue Print'
        OnClick = ViewBluePrint1Click
      end
      object PrintBluePrint1: TMenuItem
        Caption = 'Print Blue Print'
        OnClick = PrintBluePrint1Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object CodePrintSample1: TMenuItem
        Caption = 'Code Print Sample'
        OnClick = CodePrintSample1Click
      end
    end
  end
end